home *** CD-ROM | disk | FTP | other *** search
/ Komputer for Alle 2001 #11 / CD 11 (Black) - 2001.iso / K-CS.DCR / 00418.ls < prev    next >
Encoding:
Text File  |  2001-06-28  |  269 b   |  16 lines
  1. global BlinkObjekt
  2.  
  3. on new me
  4.   cursor(0)
  5.   set BlinkObject to 0
  6.   set the locH of sprite 99 to 780
  7.   set BlinkObjekt to new(script "Blink", 4, 80)
  8. end
  9.  
  10. on exitFrame
  11.   checkBlink(BlinkObjekt)
  12.   if the text of member "Efternavn" <> "doc" then
  13.     go(#loop)
  14.   end if
  15. end
  16.